

package TagServer::iServer;


#UML_MODELER_BEGIN_PERSONAL_VARS_iServer

#UML_MODELER_END_PERSONAL_VARS_iServer

use TagServer::Event;



=head1 ISERVER



=cut

=head1 ABSTRACT CLASS

=cut

=head1 PUBLIC METHODS

=pod 

=head3 onEvt

   Parameters :
      evt : TagServer::Event : 

   Return : 
      

   Description : 
      Abstract method that do anything when a event occur.

=cut

sub onEvt
{
  my($self,
     $evt, # TagServer::Event : 
    ) = @_;
#UML_MODELER_BEGIN_PERSONAL_CODE_onEvt
    print "<h1><b>!!!!!!!!!!!!Sou o iServer!!!!!!!!!!!!!</b></h1>\n";
#UML_MODELER_END_PERSONAL_CODE_onEvt
}




=cut


=head1 METHODS FOR SUBCLASSING



=cut


=head1 PRIVATE METHODS



=cut






return 1;
